package top.infopub.util;

/**
 * 金额数据中文格式化工具类
 * @author Awoke
 * @version 2018年9月14日
 * @see MoneyToChinese
 * @since
 */
public final class MoneyToChinese {

    static String HanDigiStr[] = new String[] {"零", "壹", "贰", "叁", "肆", "伍", "陆", "柒", "捌", "玖"};

    static String HanDiviStr[] = new String[] {"", "拾", "佰", "仟", "万", "拾", "佰", "仟", "亿", "拾",
        "佰", "仟", "万", "拾", "佰", "仟", "亿", "拾", "佰", "仟", "万", "拾", "佰", "仟"};

    /**
     * 将数字转为大写的汉字表示形式
     * 
     * @param String NumStr
     * @return String
     */
    public static String positiveIntegerToHanStr(String numStr) {
        // 输入字符串必须正整数，只允许前置空格(必须右对齐)，不宜有前置零
        String RMBStr = "";
        boolean lastzero = false;
        boolean hasvalue = false; // 亿、万进位前有数值标记
        int len, n;
        len = numStr.length();
        if (len > 15) {
            return "数值过大!";
        }
        for (int i = len - 1; i >= 0; i-- ) {
            if (numStr.charAt(len - i - 1) == ' ') continue;
            n = numStr.charAt(len - i - 1) - '0';
            if (n < 0 || n > 9) {
                return "输入含非数字字符!";
            }

            if (n != 0) {
                if (lastzero) RMBStr += HanDigiStr[0]; // 若干零后若跟非零值，只显示一个零
                // 如十进位前有零也不发壹音用此行
                if (!(n == 1 && (i % 4) == 1 && i == len - 1)) // 十进位处于第一位不发壹音
                    RMBStr += HanDigiStr[n];
                RMBStr += HanDiviStr[i]; // 非零值后加进位，个位为空
                hasvalue = true; // 置万进位前有值标记
            }
            else {
                if ((i % 8) == 0 || ((i % 8) == 4 && hasvalue)) // 亿万之间必须有非零值方显示万
                    RMBStr += HanDiviStr[i]; // “亿”或“万”
            }
            if (i % 8 == 0) hasvalue = false; // 万进位前有值标记逢亿复位
            lastzero = (n == 0) && (i % 4 != 0);
        }

        if (RMBStr.length() == 0) return HanDigiStr[0]; // 输入空字符或"0"，返回"零"
        return RMBStr;
    }

    /**
     * 将浮点型数值转为人民币的表示方式（前面带￥）
     * 
     * @param double val（传入的数值）
     * @return String（转化后的人民币数值表示方式字符串）
     */
    public static String numToRMBStr(double val) {
        String SignStr = "";
        String TailStr = "";
        long fraction, integer;
        int jiao, fen;

        if (val < 0) {
            val = -val;
            SignStr = "负";
        }
        if (val > 99999999999999.999 || val < -99999999999999.999) return "数值位数过大!";
        // 四舍五入到分
        long temp = Math.round(val * 100);
        integer = temp / 100;
        fraction = temp % 100;
        jiao = (int)fraction / 10;
        fen = (int)fraction % 10;
        if (jiao == 0 && fen == 0) {
            TailStr = "整";
        }
        else {
            TailStr = HanDigiStr[jiao];
            if (jiao != 0) TailStr += "角";
            if (integer == 0 && jiao == 0) // 零元后不写零几分
                TailStr = "";
            if (fen != 0) TailStr += HanDigiStr[fen] + "分";
        }
        // 下一行可用于非正规金融场合，0.03只显示“叁分”而不是“零元叁分”
        // if( !integer ) return SignStr+TailStr;
        return "￥" + SignStr + positiveIntegerToHanStr(String.valueOf(integer)) + "圆" + TailStr;
    }

    /**
     * 将浮点型数值转为人民币的表示方式
     * 
     * @param double val（传入的数值）
     * @return String（转化后的人民币数值表示方式字符串）
     */
    public String numToCNMoney(double val) {
        String SignStr = "";
        String TailStr = "";
        long fraction, integer;
        int jiao, fen;

        if (val < 0) {
            val = -val;
            SignStr = "负";
        }
        if (val > 99999999999999.999 || val < -99999999999999.999) return "数值位数过大!";
        // 四舍五入到分
        long temp = Math.round(val * 100);
        integer = temp / 100;
        fraction = temp % 100;
        jiao = (int)fraction / 10;
        fen = (int)fraction % 10;
        if (jiao == 0 && fen == 0) {
            TailStr = "整";
        }
        else {
            TailStr = HanDigiStr[jiao];
            if (jiao != 0) TailStr += "角";
            if (integer == 0 && jiao == 0) // 零元后不写零几分
                TailStr = "";
            if (fen != 0) TailStr += HanDigiStr[fen] + "分";
        }
        // 下一行可用于非正规金融场合，0.03只显示“叁分”而不是“零元叁分”
        // if( !integer ) return SignStr+TailStr;
        return SignStr + positiveIntegerToHanStr(String.valueOf(integer)) + "圆" + TailStr;
    }

}
